home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / PROGNG_C / CSUBR.LZH / L_JUST.C < prev    next >
C/C++ Source or Header  |  1985-12-13  |  821b  |  29 lines
  1.  
  2. /***********************************************************************/
  3. /*                                                                     */
  4. /*    Left justify string str in size length field.                      */
  5. /*                                                                     */
  6. /***********************************************************************/
  7.  
  8. int l_just(str, size)
  9. char *str;
  10. int size;
  11. {
  12.     char *s, *d;
  13.     int len, count;
  14.  
  15.     len = strlen(str);                /* get string length */
  16.  
  17.     if (len > size)                    /* truncate, if necessary */
  18.         str[size] = 0x00;
  19.     else if (len < size) {
  20.         count = size - len;            /* number of blanks to insert */
  21.         s = str + len;
  22.         while (count--)
  23.             *s++ = ' ';                /* add leading blanks */
  24.         *s = 0x00;                    /* and terminate is properly */
  25.     }
  26.  
  27.     return str;
  28. }
  29.